home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 April / macformat-023.iso / Shareware City / Comms / tiafaq folder / GateTIA < prev    next >
Encoding:
Text File  |  1994-11-17  |  1.3 KB  |  72 lines  |  [TEXT/EMAC]
  1. !
  2. ! InterSLIP gateway script for NETCOM using TIA
  3. !   by Bill Arnett (billa@netcom.com)
  4. !   other users may have to modify the lines marked with "<-------- "
  5.  
  6. @originate
  7. matchclr
  8. matchstr 1 1 "ogin:"            ! <-------- "login:" prompt
  9. SetTries 124
  10. matchread 100
  11. note "no login prompt; trying again"
  12. write "\13"
  13. matchclr
  14. matchstr 1 1 "ogin:"            ! <-------- "login:" prompt
  15. matchread 200
  16. note "no login prompt; trying once more"
  17. write "\13"
  18. matchclr
  19. matchstr 1 1 "ogin:"            ! <-------- "login:" prompt
  20. matchread 300
  21. note "no login prompt; giving up"
  22. pause 60
  23. exit -1
  24.  
  25. @label 1
  26. note "Sending userid"
  27. write "^5\10"
  28. matchclr
  29. matchstr 1 2 "assword:"            ! <-------- "password:" prompt
  30. matchread 200
  31. note "no password prompt"
  32. pause 60
  33. exit -1
  34.  
  35. @label 2
  36. note "Sending password"
  37. write "^6\10"
  38. pause 20
  39. note "Waiting for prompt"
  40. matchclr
  41. matchstr 1 5 "% "            ! <-------- shell prompt
  42. matchstr 2 7 "incorrect"
  43. matchread 200
  44. note "No shell prompt; trying again"
  45. write "\13"
  46. matchclr
  47. matchstr 1 5 "% "            ! <-------- shell prompt
  48. matchread 300
  49. note "No shell; giving up"
  50. pause 60
  51. exit -1
  52.  
  53. @label 5
  54. note "Starting TIA"
  55. SetTries 0
  56. write "exec tia\13"            ! <-------- start TIA; quit shell
  57. matchclr
  58. matchstr 1 6 "Ready"
  59. matchread 200
  60. note "TIA not responding"
  61. pause 60
  62. exit -1
  63.  
  64. @label 6
  65. note "OK"
  66. exit 0
  67.  
  68. @label 7
  69. note "incorrect password; giving up"
  70. pause 60
  71. exit -1
  72.